inherited FrmRel_ProdFaturadoCompra: TFrmRel_ProdFaturadoCompra
  Left = 289
  Top = 112
  Caption = 'Rela'#231#227'o de Produtos Faturados de Compra'
  ClientHeight = 582
  ClientWidth = 722
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 97
    Width = 722
    Height = 418
    object Label1: TLabel
      Left = 490
      Top = 9
      Width = 96
      Height = 14
      Caption = 'Data de Fat. Inicial'
    end
    object Label2: TLabel
      Left = 496
      Top = 33
      Width = 90
      Height = 14
      Caption = 'Data de Fat. Final'
    end
    object Label5: TLabel
      Left = 12
      Top = 9
      Width = 62
      Height = 14
      Caption = 'Forn. Inicial'
    end
    object Label6: TLabel
      Left = 18
      Top = 34
      Width = 56
      Height = 14
      Caption = 'Forn. Final'
    end
    object c_repini: TSpeedButton
      Left = 125
      Top = 5
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = c_repiniClick
    end
    object c_repfim: TSpeedButton
      Left = 125
      Top = 30
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = c_repfimClick
    end
    object BtnInsereCFiscal: TSpeedButton
      Left = 12
      Top = 332
      Width = 25
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereCFiscalClick
    end
    object btnInseriProd: TSpeedButton
      Left = 12
      Top = 224
      Width = 25
      Height = 19
      Hint = 'Insere um novo Produto na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = btnInseriProdClick
    end
    object ed_dataini: TDateEdit
      Left = 589
      Top = 7
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 2
      OnKeyDown = ed_datainiKeyDown
    end
    object ed_datafim: TDateEdit
      Left = 589
      Top = 31
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 3
      OnKeyDown = ed_datafimKeyDown
    end
    object ed_repini: TEdit
      Left = 77
      Top = 5
      Width = 46
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 5
      TabOrder = 0
      OnEnter = ed_repiniEnter
      OnExit = ed_repiniExit
      OnKeyDown = ed_repiniKeyDown
      OnKeyPress = ed_repiniKeyPress
    end
    object ed_repfim: TEdit
      Left = 77
      Top = 30
      Width = 46
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 5
      TabOrder = 1
      OnEnter = ed_repfimEnter
      OnExit = ed_repfimExit
      OnKeyDown = ed_repfimKeyDown
      OnKeyPress = ed_repiniKeyPress
    end
    object p_repini: TPanel
      Left = 149
      Top = 5
      Width = 331
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Color = 14081504
      TabOrder = 18
    end
    object p_repfim: TPanel
      Left = 149
      Top = 30
      Width = 331
      Height = 22
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Color = 14081504
      TabOrder = 19
    end
    object Ed_Ordem: TRadioGroup
      Left = 12
      Top = 156
      Width = 289
      Height = 67
      Caption = 'Ordenar por'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Valor'
        'Quantidade'
        'C'#243'd. Refer'#234'ncia'
        'C'#243'd. Grupo'
        'Linha'
        'Fornecedor')
      TabOrder = 6
      OnClick = Ed_OrdemClick
    end
    object ListaProd: TCheckListBox
      Left = 11
      Top = 245
      Width = 490
      Height = 80
      BevelKind = bkFlat
      BorderStyle = bsNone
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 15
      OnExit = ListaProdExit
      OnKeyDown = ListaProdKeyDown
    end
    object ListaCFiscal: TCheckListBox
      Left = 11
      Top = 351
      Width = 490
      Height = 62
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 17
      OnKeyDown = ListaCFiscalKeyDown
    end
    object ckRefer: TCheckBox
      Left = 320
      Top = 160
      Width = 160
      Height = 17
      Caption = 'Agrupar por Refer'#234'ncia'
      TabOrder = 7
      OnClick = ckReferClick
    end
    object ckQuebra: TCheckBox
      Left = 488
      Top = 176
      Width = 117
      Height = 17
      Caption = 'Quebrar Resumo'
      TabOrder = 12
    end
    object ckGrupo: TCheckBox
      Left = 320
      Top = 176
      Width = 160
      Height = 17
      Caption = 'Agrupar por Grupo'
      TabOrder = 8
      OnClick = ckGrupoClick
    end
    object p_linha: TCheckListBox
      Left = 510
      Top = 245
      Width = 200
      Height = 168
      BevelKind = bkFlat
      BorderStyle = bsNone
      ItemHeight = 14
      TabOrder = 16
    end
    object ckResLin: TCheckBox
      Left = 488
      Top = 160
      Width = 217
      Height = 17
      Caption = 'Imprimir resumo (Linha de Produto)'
      TabOrder = 11
    end
    object pnlCF: TPanel
      Left = -443
      Top = 175
      Width = 449
      Height = 213
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 20
      Visible = False
      object Label8: TLabel
        Left = 8
        Top = 12
        Width = 123
        Height = 19
        Caption = 'C'#243'digos Fiscais'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
      end
      object dbgrdCF: TDBGrid
        Left = 3
        Top = 39
        Width = 443
        Height = 171
        Align = alBottom
        DataSource = dtsrc
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        OnDblClick = dbgrdCFDblClick
        OnKeyDown = dbgrdCFKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 333
            Visible = True
          end>
      end
      object grpBusca: TGroupBox
        Left = 8
        Top = 144
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Label9: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clYellow
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNome: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          BevelKind = bkFlat
          BorderStyle = bsNone
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeKeyDown
        end
      end
      object Panel6: TPanel
        Left = 227
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn1: TBitBtn
        Left = 364
        Top = 10
        Width = 75
        Height = 25
        Caption = '&Fechar'
        TabOrder = 3
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
          F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
          000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
          337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
          45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
          3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
          F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
          000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
          337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
          4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
          7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
          0000}
        NumGlyphs = 2
      end
    end
    object ckLinha: TCheckBox
      Left = 320
      Top = 192
      Width = 160
      Height = 17
      Caption = 'Agrupar por Linha'
      TabOrder = 9
      OnClick = ckLinhaClick
    end
    object p_fase: TCheckListBox
      Left = 7
      Top = 70
      Width = 703
      Height = 82
      Align = alCustom
      BevelKind = bkFlat
      BorderStyle = bsNone
      Color = 16056319
      Columns = 3
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      HeaderBackgroundColor = 16056319
      ItemHeight = 12
      ParentFont = False
      TabOrder = 5
    end
    object pnlProd: TPanel
      Left = 689
      Top = 95
      Width = 513
      Height = 278
      BevelInner = bvLowered
      BorderWidth = 1
      Color = clGray
      TabOrder = 21
      Visible = False
      object Shape1: TShape
        Left = 296
        Top = 10
        Width = 124
        Height = 26
        Brush.Color = 9671571
        Pen.Color = clWhite
      end
      object Label7: TLabel
        Left = 8
        Top = 12
        Width = 71
        Height = 19
        Caption = 'Produtos'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -16
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 296
        Top = 10
        Width = 123
        Height = 25
        Caption = 'Adicionar Todos'
        Flat = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsUnderline]
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          555555555555555555555555555555555555555555FF55555555555559055555
          55555555577FF5555555555599905555555555557777F5555555555599905555
          555555557777FF5555555559999905555555555777777F555555559999990555
          5555557777777FF5555557990599905555555777757777F55555790555599055
          55557775555777FF5555555555599905555555555557777F5555555555559905
          555555555555777FF5555555555559905555555555555777FF55555555555579
          05555555555555777FF5555555555557905555555555555777FF555555555555
          5990555555555555577755555555555555555555555555555555}
        NumGlyphs = 2
        ParentFont = False
        OnClick = SpeedButton1Click
      end
      object dbgrdProd: TDBGrid
        Left = 3
        Top = 40
        Width = 507
        Height = 235
        Align = alBottom
        DataSource = dtsrcProd
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial'
        TitleFont.Style = [fsBold]
        OnDblClick = dbgrdProdDblClick
        OnKeyDown = dbgrdProdKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'Cod'
            Title.Caption = 'C'#243'digo'
            Width = 111
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Descr'
            Title.Caption = 'Descri'#231#227'o'
            Width = 356
            Visible = True
          end>
      end
      object grpBuscaProd: TGroupBox
        Left = 40
        Top = 212
        Width = 433
        Height = 57
        Caption = ' Informe a Descri'#231#227'o '
        Font.Charset = ANSI_CHARSET
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Label13: TLabel
          Left = 200
          Top = 40
          Width = 229
          Height = 14
          Caption = ' Tecle <F5> p/ localizar por C'#243'd. ou Descr. '
          Font.Charset = ANSI_CHARSET
          Font.Color = clYellow
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edNomeProd: TEdit
          Left = 8
          Top = 16
          Width = 417
          Height = 22
          CharCase = ecUpperCase
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnKeyDown = edNomeProdKeyDown
        end
      end
      object Panel5: TPanel
        Left = 295
        Top = 44
        Width = 185
        Height = 14
        Alignment = taRightJustify
        BevelOuter = bvNone
        Caption = '<F2> p/ localizar'
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
      end
      object BitBtn2: TBitBtn
        Left = 428
        Top = 10
        Width = 75
        Height = 25
        Caption = '&Fechar'
        TabOrder = 3
        OnClick = BitBtn2Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777788
          F8F878F7777777777333333F00004444400777FFF444447777777777F333FF7F
          000033334D5008FFF4333377777777773337777F0000333345D50FFFF4333333
          337F777F3337F33F000033334D5D0FFFF43333333377877F3337F33F00003333
          45D50FEFE4333333337F787F3337F33F000033334D5D0FFFF43333333377877F
          3337F33F0000333345D50FEFE4333333337F787F3337F33F000033334D5D0FFF
          F43333333377877F3337F33F0000333345D50FEFE4333333337F787F3337F33F
          000033334D5D0EFEF43333333377877F3337F33F0000333345D50FEFE4333333
          337F787F3337F33F000033334D5D0EFEF43333333377877F3337F33F00003333
          4444444444333333337F7F7FFFF7F33F00003333333333333333333333777777
          7777333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333777777F3333F00003333330000003333333333337FFFF7F3333F
          0000}
        NumGlyphs = 2
      end
      object rgOrdem: TRadioGroup
        Left = 88
        Top = 3
        Width = 201
        Height = 33
        Caption = 'Ordernar'
        Columns = 2
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ItemIndex = 0
        Items.Strings = (
          'C'#243'digo'
          'Descri'#231#227'o')
        ParentFont = False
        TabOrder = 4
        OnClick = rgOrdemClick
      end
    end
    object chMarcar: TCheckBox
      Left = 8
      Top = 53
      Width = 130
      Height = 17
      Caption = 'Fases do Processo'
      Checked = True
      Color = 14936298
      ParentColor = False
      State = cbChecked
      TabOrder = 4
      OnClick = chMarcarClick
    end
    object ckRes_CFOP: TCheckBox
      Left = 488
      Top = 192
      Width = 117
      Height = 17
      Caption = 'Resumo CFOP'
      TabOrder = 13
    end
    object ckFornecedor: TCheckBox
      Left = 320
      Top = 208
      Width = 160
      Height = 17
      Caption = 'Agrupar por Fornecedor'
      TabOrder = 10
      OnClick = ckFornecedorClick
    end
    object ckbResumoPorProduto: TCheckBox
      Left = 488
      Top = 208
      Width = 137
      Height = 17
      Caption = 'Resumo por Produto'
      TabOrder = 14
    end
    object ckbProdutos: TCheckBox
      Left = 40
      Top = 228
      Width = 153
      Height = 17
      Caption = 'Relacionar os Produtos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 22
      OnClick = ckbProdutosClick
    end
    object ckbLinhaProduto: TCheckBox
      Left = 510
      Top = 228
      Width = 153
      Height = 17
      Caption = 'Linha do Produto'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 23
      OnClick = ckbLinhaProdutoClick
    end
    object ckbCodigosFiscais: TCheckBox
      Left = 40
      Top = 334
      Width = 225
      Height = 17
      Caption = 'Relacionar os C'#243'digos Fiscais'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 24
      OnClick = ckbCodigosFiscaisClick
    end
  end
  inherited Panel2: TPanel
    Top = 515
    Width = 722
    inherited btncancelar1: TBitBtn
      Left = 319
    end
    inherited btnfechar1: TBitBtn
      Left = 612
      Top = 16
    end
    inherited bimprimir: TFlatButton
      Enabled = True
      OnClick = bimprimirClick
    end
    inherited btncancelar: TFlatButton
      Left = 305
      OnClick = btncancelarClick
    end
    inherited btnfechar: TFlatButton
      Left = 600
    end
  end
  inherited sb: TStatusBar
    Top = 563
    Width = 722
  end
  inherited Panel3: TPanel
    Width = 722
    Height = 97
    inherited Label4: TLabel
      Top = 2
    end
    inherited ListaEmp: TCheckListBox
      Top = 18
      Width = 705
    end
    inherited ckListaEmpresas: TCheckBox
      Top = 1
    end
  end
  inherited RDP: TRDprint
    OnNewPage = RDPNewPage
    OnBeforeNewPage = RDPBeforeNewPage
  end
  object md: TRxMemoryData
    FieldDefs = <>
    Left = 628
    Top = 6
    object mdpro_codigo: TStringField
      FieldName = 'pro_codigo'
      Size = 15
    end
    object mdpro_codref: TStringField
      FieldName = 'pro_codref'
    end
    object mdpro_nome: TStringField
      FieldName = 'pro_nome'
      Size = 50
    end
    object mdqtde: TFloatField
      FieldName = 'qtde'
    end
    object mdvalor_unit: TFloatField
      FieldName = 'valor_unit'
    end
    object mdvalor_ipi: TFloatField
      FieldName = 'valor_ipi'
    end
    object mdpro_grupo: TStringField
      FieldName = 'pro_grupo'
      Size = 10
    end
    object mdlin_codigo: TStringField
      FieldName = 'lin_codigo'
    end
    object mdData: TDateField
      FieldName = 'Data'
    end
    object mdNF: TStringField
      FieldName = 'NF'
    end
    object mdSerie: TStringField
      FieldName = 'Serie'
    end
    object mdKG: TFloatField
      FieldName = 'KG'
    end
    object mdKGP: TFloatField
      FieldName = 'KGP'
    end
    object mdMED: TFloatField
      FieldName = 'MED'
    end
    object mdCODF_CODIGO: TStringField
      FieldName = 'CODF_CODIGO'
    end
    object mdvalor_subst: TFloatField
      FieldName = 'valor_subst'
    end
    object mdEnt_Codigo: TStringField
      FieldName = 'Ent_Codigo'
    end
  end
  object dtsrc: TDataSource
    DataSet = CDS
    Left = 556
    Top = 4
  end
  object CDS: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 584
    Top = 4
    object CDSCod: TStringField
      FieldName = 'Cod'
      Size = 10
    end
    object CDSDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object CDSProd: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 584
    Top = 33
    object CDSProdCod: TStringField
      DisplayWidth = 15
      FieldName = 'Cod'
    end
    object CDSProdDescr: TStringField
      FieldName = 'Descr'
      Size = 40
    end
  end
  object dtsrcProd: TDataSource
    DataSet = CDSProd
    Left = 556
    Top = 33
  end
  object CDSInserir: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 628
    Top = 37
    object CDSInserirCod: TStringField
      FieldName = 'Cod'
    end
  end
  object CDSREF: TRxMemoryData
    FieldDefs = <>
    Left = 428
    Top = 185
    object CDSREFCod: TStringField
      FieldName = 'Cod'
    end
    object CDSREFCusto: TFloatField
      FieldName = 'Custo'
    end
    object CDSREFQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSREFVlr: TFloatField
      FieldName = 'Vlr'
    end
  end
  object CDSGRP: TRxMemoryData
    FieldDefs = <>
    Left = 460
    Top = 185
    object CDSGRPCod: TStringField
      FieldName = 'Cod'
      Size = 10
    end
    object CDSGRPCusto: TFloatField
      FieldName = 'Custo'
    end
    object CDSGRPQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSGRPVlr: TFloatField
      FieldName = 'Vlr'
    end
  end
  object CDSLIN: TRxMemoryData
    FieldDefs = <>
    Left = 492
    Top = 185
    object CDSLINCod: TStringField
      FieldName = 'Cod'
    end
    object CDSLINCusto: TFloatField
      FieldName = 'Custo'
    end
    object CDSLINQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSLINVlr: TFloatField
      FieldName = 'Vlr'
    end
    object CDSLINVenda: TFloatField
      FieldName = 'Venda'
    end
    object CDSLINMedia: TFloatField
      FieldName = 'Media'
    end
  end
  object CDS_CFOP: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 208
    Top = 64
    object CDS_CFOPCODF_CODIGO: TStringField
      FieldName = 'CODF_CODIGO'
    end
    object CDS_CFOPCODF_DESCRICAO: TStringField
      FieldName = 'CODF_DESCRICAO'
      Size = 30
    end
    object CDS_CFOPTOTAL_PROD: TFloatField
      FieldName = 'TOTAL_PROD'
    end
    object CDS_CFOPVLR_IPI: TFloatField
      FieldName = 'VLR_IPI'
    end
    object CDS_CFOPVLR_SUBS: TFloatField
      FieldName = 'VLR_SUBS'
    end
  end
  object CDSFor: TRxMemoryData
    FieldDefs = <>
    Left = 520
    Top = 185
    object CDSForCod: TStringField
      FieldName = 'Cod'
    end
    object CDSForCusto: TFloatField
      FieldName = 'Custo'
    end
    object CDSForQtde: TFloatField
      FieldName = 'Qtde'
    end
    object CDSForVlr: TFloatField
      FieldName = 'Vlr'
    end
    object CDSForVenda: TFloatField
      FieldName = 'Venda'
    end
    object CDSForMedia: TFloatField
      FieldName = 'Media'
    end
  end
  object cdsResumoProduto: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 368
    Top = 185
    object cdsResumoProdutoProduto: TStringField
      FieldName = 'Produto'
      Size = 30
    end
    object cdsResumoProdutoFornecedor: TStringField
      FieldName = 'Fornecedor'
      Size = 50
    end
    object cdsResumoProdutoQuantidadeDoPeriodo: TFloatField
      FieldName = 'QuantidadeDoPeriodo'
    end
    object cdsResumoProdutoMediaTrimestral: TFloatField
      FieldName = 'MediaTrimestral'
    end
    object cdsResumoProdutoQuantidadeSaida: TFloatField
      FieldName = 'QuantidadeSaida'
    end
    object cdsResumoProdutoEstoqueAtual: TFloatField
      FieldName = 'EstoqueAtual'
    end
  end
end
